home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 4 / Mac Giga-ROM 4.0 - 1993.toast / FILES / GAM / C-D / Core_Wars / gemini < prev    next >
Encoding:
Text File  |  1985-08-03  |  207 b   |  14 lines  |  [FGHT/CWAR]
  1. * GEMINI copies itself forward about 100 cells
  2. * and then jumps to the copy.
  3. @-2
  4.     dat 0
  5.     dat 99
  6.     mov @-2,@-1
  7.     cmp -3,#9
  8.     jmp 4
  9.     add #1,-5
  10.     add #1,-5
  11.     jmp -5
  12.     mov #99,93
  13.     jmp 93
  14.